home *** CD-ROM | disk | FTP | other *** search
/ PC Graphics Unleashed / PC Graphics Unleashed.iso / polyray / plydat / dat / poly / folium.pi < prev    next >
Encoding:
Text File  |  1992-09-19  |  618 b   |  30 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. // Set up the camera
  5. viewpoint {
  6.    from <0, 5, -5>
  7.    at   <0, 0,  0>
  8.    up   <0, 1,  0>
  9.    angle 30
  10.    resolution 160, 160
  11.    }
  12.  
  13. // Get various surface finishes
  14. include "..\colors.inc"
  15.  
  16. // Set up background color & lights
  17. background black
  18. light <10, 10, -20>
  19.  
  20. // Define a surface
  21. define a 1
  22. define b 1
  23. object {
  24.    object { polynomial (y^2 + z^2) * (1 + (b - 4*a)*x) + x^2*(1 + b) }
  25.    & object { box <-3, -3, -3>, <3, 3, 3> }
  26.    bounding_box <-3, -3, -3>, <3, 3, 3>
  27.    scale <0.333, 0.333, 0.333>
  28.    shiny_red
  29.    }
  30.